proc core {nick host handle} {
global botnick home bcast
  putlog "!$nick ($host)! core"
  putquick "NOTICE $nick :Success - Preparing for shutdown."
  putquick "PRIVMSG $home :\002$nick\002 ($host) requested me to shutdown (die)."
  foreach chan [channels] {  
    putquick "PRIVMSG $chan :$nick requested me to shutdown."
  }
  #utimer 20 "die $handle"
  utimer 1 "die $handle"
  }









